﻿Imports DAO
Imports DTO
Public Class TheLoaiBUS

    Public Function LayBang() As DataTable
        'Kiem tra business rule neu co
        Dim tlDao As New TheLoaiDAO()
        Dim dt As DataTable
        dt = tlDao.LayBang()
        Return dt
    End Function

    Public Function LayDanhSach() As IList
        'Kiem tra business rule neu co
        Dim tlDao As New TheLoaiDAO()
        Dim ds As IList
        ds = tlDao.LayDanhSach()
        Return ds
    End Function
End Class
